<!--#include virtual="/Inc/Config.asp" -->
<!--#include virtual="/Inc/conn.asp" -->
<!--#include virtual="/2010admin/Check_IsLogin.asp" -->
<!--#include virtual="/Inc/inc.asp" -->
<!--#include virtual="/2010admin/Common/Query_List_GetSQL.asp"-->

<%
'==========================================
'**********	Modify  Start  ****************
dim TITLE,DISPFILD,PAGESIZE,SQL,HV
dim AddLabel,addURL,delURL,editURL,detailURL,detailURLsn
TITLE="用户查询"
DISPFILD="Admin_UserName<用户名称,Admin_SuperUser<超级管理员,Admin_Last_LoginDate<最后登陆时间,Admin_Last_LoginIP<最后登陆IP,Admin_UseFlag<有效标志"
PAGESIZE="20"
HV="H"

AddLabel="增加新用户"
addURL="User_Add.asp"
delURL="User_Del.asp"
editURL="User_Edit.asp"
detailURLsn=1


sql = "SELECT Admin_UserID,Admin_UserName,Admin_Last_LoginDate,Admin_Last_LoginIP,CASE Admin_UseFlag "&_
	  " WHEN '1' THEN '使用' " &_
	  " WHEN '0' THEN '停用' " &_
      " END AS Admin_UseFlag," &_
	  "	CASE Admin_SuperUser "&_
	  " WHEN '1' THEN '是' " &_
	  " WHEN '0' THEN '否' " &_
      " END AS Admin_SuperUser " &_
	  " FROM Admin_User WHERE 1=1  "

UserName = reform("UserName")

sql = LikeSql("Admin_UserName",UserName,sql)



'**********	Modify  Stop  *****************
'==========================================

If Request.form("previous")="上一页" Then PageNo=request.form("PageNo")-1
If Request.form("next")="下一页" Then PageNo=request.form("PageNo")+1
If Request.form("GotoPageNo")<>"" Then PageNo=request.form("GotoPageNo")
If Request.form("GotoPageNo2")<>"" Then	PageNo=request.form("GotoPageNo2")
%>

<HTML>
<HEAD>
<TITLE><%=Title%></TITLE>
<link href="/2010admin/css/default.css" type="text/css" rel="stylesheet">
</HEAD>
<script language="javascript">
<!--
	if (window.parent.name=="main") {
		alert('不能在新窗口打开网页!');
		window.location.href='/blank.htm';
	}
	function delcheck(){
	if (confirm('是否真的要删除这条记录？')) {
		document.form1.submit();
	}
	else return false;
}
//-->
</script>
<BODY BGCOLOR="#FFFFFF"><br>
<form method="post" name="form1">
<TABLE cellSpacing=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD width="43%" align=left><FONT size=4><B><%=TITLE%></B></FONT>
	<%if addURL<>"" then%>
	<%=GetSpace(4)%><input type='button' class='inputbutton' value='<%=AddLabel%>' name='add' onClick="window.location.href='<%=addURL%>'">
	<%end if%>	
	</TD>
    <TD width="37%" align=right>
      <TABLE cellSpacing=0 cellPadding=1 border=0>
        <TR>
          <TD>用户名称：</TD>
        </TR>
        <TR>
          <TD><INPUT class=inputtext size=8 name="UserName" Value="<%=UserName%>"></TD>
       </TR>
	   </TABLE>
	</TD>
    <TD vAlign=middle width="20%"> &nbsp;&nbsp;
      <INPUT type="submit" class="button" value="搜索" name="search">&nbsp;
	<br></TD>
  </TR>
  </TBODY>
</TABLE>
<HR SIZE=1>
<%
IF NOT Query_List_GetSQL(DISPFILD,SQL,PAGESIZE,HV,delURL,editURL,detailURL,detailURLsn) THEN
	Response.Write "<br><BR><center><font size=2><font color=#ff0000>程序执行错误！请与系统管理员联系！"
END If

Call conn_close()

%>
</FORM>
</BODY>
</HTML>
